Super PC 35

home *** CD-ROM | disk | FTP | other *** search

/ Super PC 35 / Super PC 35 (Shareware).iso / spc / JUEGOS / TANC / TEST.SET < prev next >

Wrap

Text File | 1995-09-25 | 27.3 KB | 1,457 lines

// testing :minus explosion=,-#1, expbsmok.spr explosion=#1,-#1, expbig.spr explosion=-#1,-#1, expsred.spr explosion=-#1,, expssmok.spr text=,,0,16,testing_down text=,,0,-16,testing_up score=1000; boss_wav=attack.wav; r //********************************* :save_pcx external=1002 r //********************************* // shops // repairs :171 health=full set_map=,,70,71,66,67,68 text=,,0,-48,All_Armour_Restored! text=,,0,+48,All_Armour_Restored! r :170; // fuel call=buy_repair transport=,-#1 r :buy_repair menu=200,100,@10,@2,money: Tune_up_________10 New_parts_______20 Strip_&_repair__50 New_vehicle____100 menu_end=buy_tune_up,buy_new_parts,buy_strip,buy_new_vehicle,!menu_r goto=buy_repair :buy_tune_up; health=50; r :buy_new_parts; health=100; r :buy_strip; health=250; r :buy_new_vehicle; health=full; r // get ammo :172 external=1001 set_map=,,70,71,66,67,68 text=,,+32,0,___New_Weapon!^Press_QWERTY_to_use text=,,-32,0,___New_Weapon!^Press_QWERTY_to_use r // buy ammo call=buy_ammo transport=,-#1 r :buy_ammo menu=200,100,@13,@2,Money: penetrator_________10000 heli_killer_________5000 wall_blaster________2000 uzi_________________1000 menu_end=buy_penetrator,buy_heli_killer,buy_wall_blaster,buy_uzi,!menu_r r :buy_uzi; main_shot=shtlitmi.rot; r :buy_wall_blaster; main_shot=shtmedmi.rot; r :buy_heli_killer; main_shot=shtwhitm.rot; r :buy_penetrator; main_shot=shtmetal.rot; r :rescue text=-60,,0,-16,pilot_rescued^____10000 score=10000 health=100 wav=applause.wav @3=>1 r //********************************* :start mix_sound=11025 //*********************************************************************** :start_game mod_off @load=default.@ game_over_bmp=title.bmp cant_afford_wav=money.wav call=start_menu :restart_game @2=100000 @3=0 // 0. grass block_connects=Grass 81,82,83; 75; 73,76; 80; 54,55,56; 63,58; 62,61; 57 70,71,66,67,68,70,71,66,67,68,70,71,66,67,68,70,71,66,67,68,64,65,69 59; 74; 78,79; 60 1,4,6; 256 block_connects_end // 1. trees block_connects=Trees 157; 158; 159; 160; 161; 162; 163; 164 165,166,167,168,169; 165;165;165;165 -1; 64 block_connects_end // 2. red stuff block_connects=Red_stuff 110,111; 109; 104,105; 106; 92,93; 98; 94,95; 97 102,103,102,103,102,103,102,103,102,103,102,103,100,101 96; 108; 107; 99 3,7; 256 block_connects_end // 3. Sea block_connects=Sea 149,150; 148; 143,147; 144,146; 129,130; 135; 136,133,132; 137 138,139,138,139,138,139,138,139,140; 134; 145; 142; 131 7; 256 block_connects_end // 4. concrete block_connects=Airfield 30,5; 31,32; 33,34; 38,35,36; 38,35,36; 37; 39,40; 41,42,43 0,1; 0; 0; 0; 0 5; 256 block_connects_end // 5. Building block_connects=Building 19; 19,20,21,22; 23,24; 28; 28; 29; 25,26; 27 19; 19;19;19;19 -1; 256 block_connects_end // 6. Road on grass road_block_connects=Road 112,117; 116,119; 114; 115; 112; 113; 118 7; 256 block_connects_end // 7. Road on red road_block_connects=Road/Bridge 120,121; 125,127; 122; 126; 123; 124; 120 6; 256 block_connects_end block_hit_wav=69,blow.wav block_hit_wav=65,blow.wav block_hit_wav=64,blow.wav block_hit_wav=100,blow.wav block_hit_wav=101,blow.wav block_hit_wav=35,blow.wav block_hit_wav=36,blow.wav block_hit_wav=37,blow.wav block_hit_wav=38,blow.wav block_hit_wav=42,blow.wav block_hit_wav=30,blow.wav block_hit_wav=31,blow.wav // on ground heli/planes block_hit_wav=17,blow.wav block_hit_wav=88,blow.wav block_hit_wav=89,blow.wav block_hit_wav=90,blow.wav block_hit_wav=91,blow.wav // big hanger block_hit_wav=9,blow.wav //************************************************************** block_power=9,1000 //************************************************************** // damage imprints // concrete hole imprint=0,44,47 imprint=1,44,47 // grass hole imprint=70,72 imprint=71,72 imprint=66,72 imprint=67,72 imprint=68,72 imprint=64,72 //************************************************************** mod=chroxial.mod death=death; game_over=game_over; exit_menu=start_game; wobble_speed=16; wobble_min=32; mouse_friction=40; skid=8; gravity_skid=8; gravity=0; flying_shots; rotate_accelerate=64; rotate_speed=1500 hit_percent=100; rotation_sprites=0; shoot_macro=0 shadow=1 //***************************************** // declare sprites... animate_rate=800; rotation_sprites=2; 180_rotation; trail_speed=600 sprite=shtmetal.rot sprite=shtmedmi.rot sprite=shtwhitm.rot sprite=shtlitmi.rot rotation_sprites=1 fire_wav=uzishort.wav sprite=shtlitbu.rot fire_wav= rotation_sprites=1; 360_rotation; trail_speed=500 sprite=thetank.rot sprite=empty.rot trail_speed=250 sprite=pldelgrn.rot; // height=750 // sprite=plbigblk.rot // boss: height=600 sprite=plblk.rot; // height=400 sprite=plsleath.rot; // height=1000 sprite=planegrn.rot; // height=500 sprite=plwhite.rot; // height=300 rotation_sprites=2 sprite=heligrn.rot; // height=150 sprite=heliblk.rot; // height=250 rotation_sprites=0 sprite=expbsmok.spr animate_rate=800 sprite=trlwsmok.spr animate_rate=400 sprite=expsred.spr animate_rate=500 sprite=expbig.spr animate_rate=1000 sprite=expssmok.spr rotation_sprites=1 //***************************************** // declare macros... macro_reset=1 macro=plcircr.m macro=plup.m macro=pldown.m macro=plcircl.m macro=plright.m macro=plleft.m macro=plcircl.m macro=beacon.m macro_reset=0 macro=frright.m macro=frleft.m //***************************************** // trails... block_trail=66,expsred.spr block_trail=70, block_trail=71, //***************************************** // explosions... start_explosion=expbsmok.spr end_explosion=expbig.spr hit_explosion=expsred.spr //mouse_trail=expbsmok.spr //mouse_trail_speed=400 //***************************************** hit_wav=blow.wav; //end_wav=attack.wav; //start_wav=lkyeah.wav; //***************************************** // calls key_call=12,minus; key_call=25,save_pcx; // P=save pcx key_call=24,options; //************************************************************************* // da game!!! trail=expbsmok.spr; fire_trail=expssmok.spr block_collide_wav=homer001.wav hit_percent=@1; //rotate_accelerate=48 //rotate_speed=500 //height=500 //rotation_sprites=0; //item=#54,#80,0,shtmetal.rot,pldelgrn.rot //rotation_sprites=1; height=32 item=#54,#78, 0,shtlitbu.rot,thetank.rot block_collide_wav=; rotation_sprites=0; health_sprite=bldrepai.spr; //health_sprite=revdash.spr; //******************************* // baddies fire_trail=expssmok.spr no_trail hit_percent=300 height=500 //item=#0054,#0080,plcircl.m,shtlitmi.rot,pldelgrn.rot //********************* // helis... //********** height=160 // heli around airport buildings item=#0050,#0079,follow,shtlitmi.rot,heligrn.rot item=#0056,#0082,follow,shtlitmi.rot,heligrn.rot // heli around ace pilot item=#0047,#34,plcircbl.m,shtlitmi.rot,heligrn.rot item=#0037,#34,plcircbl.m,shtlitmi.rot,heligrn.rot // heli guarding item=#64,#73,plcircr.m,shtlitmi.rot,heligrn.rot // guarding ammo item=#55,#88,plcircr.m,shtlitmi.rot,heligrn.rot // guard bunkers item=#84,#72,plcircr.m,shtlitmi.rot,heligrn.rot //***** black helis... height=250 no_trail fire_trail=trlwsmok.spr // guard pilots on desert item=#72,#54,plcircr.m,shtmedmi.rot,heliblk.rot item=#95,#97,plcircr.m,shtmedmi.rot,heliblk.rot //********** height=500 trail=expbsmok.spr fire_trail=expssmok.spr // planes guarding somethings item=#41,#42,plcircbl.m,shtlitmi.rot,plblk.rot // guarding ship wreck item=#61,#59,plcircbl.m,shtlitmi.rot,plblk.rot // guard pilots on desert item=#66,#45,pldown.m,shtlitmi.rot,plblk.rot item=#68,#64,plup.m,shtlitmi.rot,plblk.rot //********** height=1000 fire_trail=trlwsmok.spr // guarding sleaths sleath=1 no_trail item=#89,#80,plcircbl.m,shtwhitm.rot,plsleath.rot sleath=0 //************************************************************************* // calls call=#65,#65,bridge1; call=#69,#65,bridge2; call=#76,#103,bridge3; call=#63,#32,bridge4 call=#61,#40,#62,#47,bridge5 call=#54,#76,out_of_airport; call=#39,#90,to_bl_island1; call=#31,#90,to_bl_island2; call=#42,#98,save_pilot1; call=#48,#41,save_pilot2; call=#53,#93,#54,#93,save_pilot3; // save 2 pilots on desert call=#62,#104,#64,#106,save_pilot4; // save heli pilots(bottom map border) call=#28,#27,save_pilot5; // save heli next to river call=#25,#23,save_pilot6; // save heli next to river call=#26,#19,save_pilot7; // save heli next to river call=#28,#80,#29,#83,save_pilot8; // save pilots in desert call=#35,#73,#40,#77,save_pilot9; call=#22,#66,#29,#74,save_pilot10; call=#23,#83,#24,#85,save_pilot11; call=#22,#60,#24,#65,save_pilot12; call=#22,#34,#25,#38,save_pilot13; call=#52,#51,save_pilot14 call=#54,#45,save_pilot15 call=#41,#51,#47,#52,save_pilot16 call=#41,#51,#47,#52,save_pilot17 call=#42,#19,#47,#20,save_pilot18 call=#59,#47,#61,#48,save_pilot19 call=#39,#34,ace_pilot1; // rescue ace pilot call=#64,#71,#66,#74,protect_fuel; // protect fuel supply call=#33,#66,#34,#72,trapped; // trap person call=#28,#48,#30,#51,protect_ammo1; call=#27,#44,protect_ammo2; // kill the guy getting the ammo! call=#56,#36,protect_ammo3 call=#56,#35,protect_ammo4 //****** right side of river call=#82,#60,#84,#69,air_strip; // air strip guard call=#87,#69,#92,#76,heli_pad; // protect heli pad call=#84,#80,#88,#82,protect_sleath; // protect sleaths call=#90,#91,bridge_b1; // bridge at bottom of map call=#89,#97,#91,#98,bridge_b2; // after bridge call=#96,#99,bridge_b3; call=#96,#102,island_br1; // bottom right island call=#91,#104,#92,#106,island_br2; call=#102,#103,#103,#106,island_br3; call=#67,#77,#76,#84,save_pilot_br1; // save pilots at bottom right //************* Forest call=#97,#52,#100,#56,forest1 call=#98,#44,#101,#47,forest2 call=#90,#37,forest3 call=#93,#44,forest4 call=#94,#50,forest5 call=#84,#56,forest6 call=#90,#52,forest7 call=#77,#47,forest8 call=#77,#43,forest9 call=#82,#43,#84,#45,forest10 call=#87,#47,forest11 call=#90,#46,forest12 call=#87,#42,forest13 call=#82,#38,forest14 call=#75,#38,#77,#39,forest15 call=#79,#30,#81,#31,forest16 call=#82,#27,forest17 call=#85,#34,#86,#36,forest18 call=#91,#31,forest19 call=#94,#38,#96,#39,protect_repairs1 call=#92,#55,protect_repairs2 call=#74,#30,#77,#31,protect_repairs3 call=#100,#28,forest_end //************************************************************************* play //************************************************************************* // routines to make planes appear // crossing bridges :bridge1 height=500 trail=expbsmok.spr fire_trail=expssmok.spr item=#0074,#0065,follow2,shtlitmi.rot,plblk.rot r :bridge2 height=500 trail=expbsmok.spr fire_trail=expssmok.spr item=#0062,#0065,follow2,shtlitmi.rot,plblk.rot r :bridge3 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#84,#103,plright.m,shtlitbu.rot,plblk.rot item=#68,#103,plleft.m,shtlitbu.rot,plblk.rot r :bridge4 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=+#8,,follow2,shtlitbu.rot,plblk.rot r :bridge5 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#61,-#8,pldown.m,shtlitbu.rot,plblk.rot item=#61,+#8,plup.m,shtlitbu.rot,plblk.rot r //*********** // coming out of 1st airport :out_of_airport height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#46,#75,follow2,shtlitbu.rot,plblk.rot item=#63,#75,follow2,shtlitbu.rot,plblk.rot r // going to bottom left island :to_bl_island1 height=250 no_trail fire_trail=trlwsmok.spr item=#33,#90,follow,shtmedmi.rot,heliblk.rot r :to_bl_island2 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#23,#90,follow2,shtwhitm.rot,plsleath.rot item=#25,#90,plcircbl.m,shtwhitm.rot,plsleath.rot height=250 no_trail fire_trail=trlwsmok.spr item=#26,#93,follow,shtmedmi.rot,heliblk.rot item=#31,#93,plcircl.m,shtmedmi.rot,heliblk.rot item=#20,#89,follow,shtmedmi.rot,heliblk.rot r // saving a pilot(bottom of map) :save_pilot1 height=250 no_trail item=#42,#105,follow,shtmedmi.rot,heliblk.rot r // save pilot on desert(mid map) :save_pilot2 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#48,#49,follow2,shtlitbu.rot,plblk.rot item=#48,#33,pldown.m,shtlitbu.rot,plblk.rot r // save 2 pilots on desert :save_pilot3 height=150 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#53,#100,follow,shtmedmi.rot,heligrn.rot item=#54,#100,follow,shtmedmi.rot,heligrn.rot r // save heli pilots(bottom map border) :save_pilot4 height=150 no_trail fire_trail=trlwsmok.spr item=#70,#103,follow,shtmedmi.rot,heligrn.rot r :save_pilot5 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#28,#35,follow2,shtmedmi.rot,plblk.rot r :save_pilot6 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#32,#23,plleft.m,shtmedmi.rot,plblk.rot r :save_pilot7 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#34,#19,plleft.m,shtmedmi.rot,planegrn.rot r // save pilots in desert :save_pilot8 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#28,#88,plup.m,shtwhitm.rot,plsleath.rot item=#28,#72,pldown.m,shtwhitm.rot,plsleath.rot r :save_pilot9 height=250 no_trail fire_trail=trlwsmok.spr item=#37,#75,plcircr.m,shtmedmi.rot,heliblk.rot item=#35,#73,plcircr.m,shtmedmi.rot,heliblk.rot r :save_pilot10 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#30,#71,plcircbl.m,shtmedmi.rot,planegrn.rot item=#30,#68,plcircbl.m,shtmedmi.rot,planegrn.rot r :save_pilot11 set_map=#26,#83,100,101 set_map=#26,#84,100,101 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#22,#92,follow2,shtmedmi.rot,planegrn.rot item=#23,#76,follow2,shtmedmi.rot,planegrn.rot r :save_pilot12 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#23,+#8,follow2,shtmedmi.rot,planegrn.rot item=#22,-#8,follow2,shtmedmi.rot,planegrn.rot r :save_pilot13 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#22,#26,follow2,shtmedmi.rot,planegrn.rot item=#23,#27,pldown.m,shtmedmi.rot,planegrn.rot item=#24,#27,pldown.m,shtmedmi.rot,planegrn.rot item=#25,#26,follow2,shtmedmi.rot,planegrn.rot r :save_pilot14 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#52,-#7,follow2,shtwhitm.rot,plsleath.rot r :save_pilot15 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#53,#45,plcircr.m,shtwhitm.rot,plsleath.rot r :save_pilot16 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#53,#45,plcircr.m,shtwhitm.rot,plsleath.rot r :save_pilot17 height=1000 trail=expbsmok.spr fire_trail=trlwsmok.spr item=+#8,,follow2,shtwhitm.rot,plsleath.rot item=-#8,,follow2,shtwhitm.rot,plsleath.rot r :save_pilot18 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#42,-#8,follow2,shtlitbu.rot,plblk.rot item=#43,-#7,pldown.m,shtlitbu.rot,plblk.rot item=#44,-#6,follow2,shtlitbu.rot,plblk.rot item=#45,-#7,pldown.m,shtlitbu.rot,plblk.rot item=#46,-#8,follow2,shtlitbu.rot,plblk.rot r :save_pilot19 height=250 no_trail fire_trail=trlwsmok.spr item=#61,#47,plcircl.m,shtmedmi.rot,heliblk.rot r //************ // rescue ace pilot trapped in red rocks :ace_pilot1 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#47,#33,follow2,shtlitmi.rot,planegrn.rot item=#31,#34,follow2,shtlitmi.rot,planegrn.rot height=400 item=#40,#41,plup.m,shtlitmi.rot,planegrn.rot item=#39,#27,pldown.m,shtlitmi.rot,planegrn.rot r :protect_fuel height=150 no_trail fire_trail=expssmok.spr item=#63,#72,plcircbl.m,shtlitmi.rot,heligrn.rot r // trap player in red blocks :trapped height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#32,-#8,follow2,shtmedmi.rot,planegrn.rot item=#33,+#8,plup.m,shtmedmi.rot,planegrn.rot item=#34,-#8,follow2,shtmedmi.rot,planegrn.rot set_map=#35,#66,100,101 set_map=#35,#67,100,101 set_map=#35,#68,100,101 set_map=#35,#69,100,101 set_map=#35,#70,100,101 set_map=#35,#71,100,101 set_map=#36,#66,100,101 set_map=#36,#67,100,101 set_map=#36,#68,100,101 set_map=#36,#69,100,101 set_map=#36,#70,100,101 set_map=#36,#71,100,101 set_map=#30,#66,100,101 set_map=#30,#67,100,101 set_map=#30,#68,100,101 set_map=#30,#69,100,101 set_map=#30,#70,100,101 set_map=#30,#71,100,101 set_map=#31,#66,100,101 set_map=#31,#67,100,101 set_map=#31,#68,100,101 set_map=#31,#69,100,101 set_map=#31,#70,100,101 set_map=#31,#71,100,101 text=,,-16,0,Ha_Ha_Ha!!! text=,,16,0,Ha_Ha_Ha!!! wav=attack.wav r :protect_ammo1 height=750 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#29,#43,pldown.m,shtmedmi.rot,planegrn.rot item=#30,#41,follow2,shtmedmi.rot,planegrn.rot item=#31,#42,pldown.m,shtmedmi.rot,planegrn.rot r :protect_ammo2 height=1000 no_trail fire_trail=trlwsmok.spr item=,-#8,follow2,shtwhitm.rot,plsleath.rot item=,+#8,follow2,shtwhitm.rot,plsleath.rot item=+#8,,follow2,shtwhitm.rot,plsleath.rot item=-#8,,follow2,shtwhitm.rot,plsleath.rot r :protect_ammo3 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=,-#7,follow2,shtlitbu.rot,plblk.rot r :protect_ammo4 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=,+#8,follow2,shtlitbu.rot,plblk.rot r //***************** // 2nd airport(right side) // guarding air strip :air_strip height=1000 no_trail sleath=1 fire_trail=trlwsmok.spr item=#82,-#8,follow2,shtwhitm.rot,plsleath.rot item=#83,+#8,follow2,shtwhitm.rot,plsleath.rot sleath=0 r // guard heli pad :heli_pad height=150 no_trail fire_trail=expssmok.spr item=#87,#71,plcircr.m,shtlitmi.rot,heligrn.rot item=#87,#74,follow,shtlitmi.rot,heligrn.rot item=#90,#73,plcircr.m,shtlitmi.rot,heligrn.rot r :protect_sleath height=1000 no_trail sleath=1 fire_trail=trlwsmok.spr item=-#8,#80,follow2,shtwhitm.rot,plsleath.rot item=+#8,#81,follow2,shtwhitm.rot,plsleath.rot sleath=0 r // OK! :bridge_b1 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#90,#100,follow2,shtlitbu.rot,plblk.rot item=#90,#80,follow2,shtlitbu.rot,plblk.rot r :bridge_b2 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=#84,#97,follow2,shtlitbu.rot,plblk.rot item=#96,#98,follow2,shtlitbu.rot,plblk.rot r :bridge_b3 height=400 trail=expbsmok.spr fire_trail=expssmok.spr item=,#109,follow2,shtlitbu.rot,plblk.rot r // OK! :island_br1 height=400 trail=expbsmok.spr fire_trail=trlwsmok.spr item=#85,#104,follow2,shtmedmi.rot,plwhite.rot item=#105,#103,plleft.m,shtmedmi.rot,plwhite.rot item=#105,#105,follow2,shtmedmi.rot,plwhite.rot r :island_br2 height=250 no_trail fire_trail=trlwsmok.spr item=#87,#104,plcircr.m,shtmedmi.rot,heliblk.rot :island_br3 height=250 no_trail fire_trail=trlwsmok.spr item=#104,#104,plcircr.m,shtmedmi.rot,heliblk.rot item=#104,#99,plcircr.m,shtmedmi.rot,heliblk.rot r :save_pilot_br1 height=250 no_trail fire_trail=trlwsmok.spr item=#66,#79,plcircr.m,shtmedmi.rot,heliblk.rot item=#67,#81,plcircr.m,shtmedmi.rot,heliblk.rot item=#69,#83,plcircr.m,shtmedmi.rot,heliblk.rot r //**************** // forest // start of forest :forest1 start_explosion=; height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#98,#45,follow2,shtlitmi.rot,planegrn.rot item=#97,#45,follow2,shtlitmi.rot,planegrn.rot r // jets from all sides :forest2 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#99,#37,pldown.m,shtlitmi.rot,planegrn.rot item=#106,#45,plleft.m,shtlitmi.rot,planegrn.rot item=#100,#52,plup.m,shtlitmi.rot,planegrn.rot item=#93,#44,plright.m,shtlitmi.rot,planegrn.rot r :forest3 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=,+#7,follow2,shtlitmi.rot,planegrn.rot r :forest4 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#94,#52,follow2,shtlitmi.rot,planegrn.rot item=#93,#52,follow2,shtlitmi.rot,planegrn.rot r :forest5 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=,+#7,follow2,shtlitmi.rot,planegrn.rot r :forest6 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=-#7,,follow2,shtlitmi.rot,planegrn.rot r // ambush from above :forest7 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#89,#44,follow2,shtlitmi.rot,planegrn.rot item=#90,#44,pldown.m,shtlitmi.rot,planegrn.rot item=#91,#44,follow2,shtlitmi.rot,planegrn.rot r :forest8 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=,-#7,follow2,shtlitmi.rot,planegrn.rot r :forest9 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=+#7,,follow2,shtlitmi.rot,planegrn.rot r :forest10 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#82,#51,follow2,shtlitmi.rot,planegrn.rot item=#83,#51,follow2,shtlitmi.rot,planegrn.rot r :forest11 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=-#7,,follow2,shtlitmi.rot,planegrn.rot r :forest12 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=,-#7,follow2,shtlitmi.rot,planegrn.rot r :forest13 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#84,#39,plcircr.m,shtlitmi.rot,planegrn.rot r :forest14 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#73,#37,follow2,shtlitmi.rot,planegrn.rot item=#73,#37,follow2,shtlitmi.rot,planegrn.rot r :forest15 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#76,#30,follow2,shtlitmi.rot,planegrn.rot r :forest16 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#79,#23,follow2,shtlitmi.rot,planegrn.rot item=#78,#23,follow2,shtlitmi.rot,planegrn.rot r :forest17 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#83,#35,follow2,shtlitmi.rot,planegrn.rot item=#84,#35,follow2,shtlitmi.rot,planegrn.rot r :forest18 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#92,#34,follow2,shtlitmi.rot,planegrn.rot item=#92,#35,follow2,shtlitmi.rot,planegrn.rot r :forest19 height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=,+#7,follow2,shtlitmi.rot,planegrn.rot item=,+#16,follow2,shtlitmi.rot,planegrn.rot r // end of forest :forest_end height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#101,#20,follow2,shtlitmi.rot,planegrn.rot item=#101,#12,follow2,shtlitmi.rot,planegrn.rot r :protect_repairs1 height=250 no_trail fire_trail=trlwsmok.spr item=#96,#36,plcircr.m,shtmedmi.rot,heliblk.rot item=#95,#36,plcircl.m,shtmedmi.rot,heliblk.rot r :protect_repairs2 height=250 no_trail fire_trail=trlwsmok.spr item=#86,#56,plcircr.m,shtmedmi.rot,heliblk.rot height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#90,#48,pldown.m,shtlitmi.rot,planegrn.rot item=#80,#54,follow2,shtlitmi.rot,planegrn.rot item=#80,#57,follow2,shtlitmi.rot,planegrn.rot r :protect_repairs3 height=250 no_trail fire_trail=trlwsmok.spr item=#73,#27,plcircr.m,shtmedmi.rot,heliblk.rot height=600 trail=expbsmok.spr fire_trail=expssmok.spr item=#74,#20,follow2,shtlitmi.rot,planegrn.rot item=#75,#20,follow2,shtlitmi.rot,planegrn.rot r //*************************************************************************** // misc routines // starting menu :start_menu bmp=257,title.bmp boss_wav=welcome.wav menu=200,250 play_the_game! high_scores credits options exit menu_end=!play_the_game,show_high_scores,credits,options_from_menu,!exit_game,!exit_game goto=start_menu; :menu_r r; :show_high_scores high_scores=0,0,title.bmp; r; :credits pcx=257,tank3d.pcx; any_key; r; :exit_game //pcx=257,-tank-.pcx; //any_key @save=default.@ exit=0; :play_the_game external=1000,@4,start_menu,globe.spr pcx=257,tank3d.pcx menu=272,380,@11 easy normal hard menu_end=easy_game,normal_game,hard_game,!play_the_game r :easy_game; @1=10; r; :normal_game; @1=20; r; :hard_game; @1=40; r; //******************************* :options_from_menu bmp=257,title.bmp :options menu=200,250,@12 sound_on sound_off mix_at_11khz mix_at_22khz play_music stop_music calibrate_the_joystick done menu_end=sound_on,sound_off,11khz,22khz,music_on,music_off,calibrate,!menu_r,!menu_r goto=options; :sound_on; sound=1; r; :sound_off; sound=0; r; :11khz; mix_sound=11025; r; :22khz; mix_sound=22050; r; :music_on; mod_on; r :music_off; mod_off; r :calibrate; calibrate_joystick; r //******************************* // ending bits... :death pcx=257,-tank-.pcx any_key goto=restart_game :game_over pcx=257,-tank-.pcx any_key goto=start_game //******************************* // hits big plane hanger :H9 hit_percent=100 fire_trail=trlwsmok.spr trail=expsred.spr trail_speed=250 rotation_sprites=1 height=600 360_rotation middle=0,256 boss_item=,-#8,follow2,shtmetal.rot,plbigblk.rot rotation_sprites=0 fire_trail=expssmok.spr hit_percent=300 set_map=,,44,47 explosion=,,expbig.spr set_map=-#1,,47,44 explosion=-#1,,expbig.spr set_map=+#1,,44,47 explosion=+#1,,expbig.spr set_map=-#1,-#2,47,44 explosion=-#1,-#2,expbig.spr set_map=,-#2,44,47 explosion=,-#2,expbig.spr set_map=+#1,-#2,47,44 explosion=+#1,-#2,expbig.spr set_map=-#1,-#1,44,47 explosion=-#1,-#1,expbig.spr set_map=,-#1,47,44 explosion=,-#1,expbig.spr set_map=+#1,-#1,44,47 explosion=+#1,-#1,expbig.spr lives=1 text=-74,+#1,0,12,Extra_Life!! text=-110,-#1,0,-12,Hanger_destroyed^___Watch_out! text=-64,,-20,0,Watch_out! text=-64,,+20,0,Watch_out! boss_wav=attack.wav r // hitting rocks on grass :H69 set_map=,,65 r :H65 set_map=,,64 r :H64 set_map=,,72 r // hitting red stuff :H100 :H101 set_map=,,102,103 r // hitting ammo dumps :H42 :H43 :H30 :H31 flash_explosion=256,600,+64 explosion=expbig.spr set_map=,,48 :cache_score score=1000 text=,,0,-16,Cache_blown!^___1000 r :H37 :H38 flash_explosion=256,600,+64 explosion=expbig.spr set_map=,,46 goto=cache_score // hitting fence buildings :H35 :H36 explosion=expbig.spr set_map=,,46 r // debris hit :H48 set_map=,,46 r // rescue pilots :13 text=-100,+#1,0,+16,pilot_hospitalised set_map=,,14,16,18 goto=rescue :52 set_map=,,49 goto=rescue :53 set_map=,,102,103 goto=rescue // going into hanger switch thingy :23 external=1003,32,600,thetank.rot,pldelgrn.rot boss_wav=jetover.wav r // destroy helis on pad :H17 score=4000 text=,,0,-16,Baddie_killed!^_____4000 explosion=expbig.spr set_map=,,13 r // destroy planes/helis on ground :H88 :H89 :H90 :H91 score=4000 text=,,0,-16,Baddie_killed!^_____4000 explosion=expbig.spr set_map=,,44,47 r // bunkers :H86 :H87 explosion=expbig.spr set_map=,,48 score=2000 text=,,0,-16,Bunker_blown!^____2000 r //******************************* Variables... @1 easy/medium/hard @2 Money @3 Pilots saved @4 Place on globe you're at Last selects... @10 buy fuel @11 easy,med... @12 options @13 ammo